home *** CD-ROM | disk | FTP | other *** search
/ Inventor Labs: Transportation / InventorLabs - Transportation.iso / mac / Builders / media / netacess / url95.dir / 00017_Script_17 < prev    next >
Text File  |  1996-10-10  |  606b  |  28 lines
  1. on exitFrame
  2.   global TheWeb
  3.   
  4.   --
  5.   -- Stay here until the installation program has exited
  6.   -- then go to either the generic launch point or back
  7.   -- to the start of the test progrm
  8.   --
  9.   
  10.   if TheWeb(mCheckInstall) = 1 then
  11.     go frame the frame
  12.   else if TheWeb(mCheckInstall) = 0 then 
  13.     
  14.     --
  15.     -- Installation was successful
  16.     -- We often need to give Windows '95
  17.     -- time to write the ini file out to 
  18.     -- disk, so close the web and jump to
  19.     -- our standard test location
  20.     --
  21.     CloseWeb
  22.     go "Test"
  23.     
  24.   else 
  25.     go "Start"
  26.   end if
  27.   
  28. end